Top 10k strings from Basic Tutor (1987)(Kamasoft)(sk)[a].tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
10 UUUUUUUUUUUUUUU 8 UUUUUUUUUUUUUUUU 6 UUUUUUUUUUUUUUUUUU 5 UUUUUUUUUUUU 4 UUUUUUUUUUUUU 2 ;" ": 2 "BASIC M/C1" 2 "BASIC M/C" 1 uUUUUUUUUUUUUUUUU 1 UUUUUUUUUUUUUUUUUUUUUp 1 UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU` 1 UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU\ 1 UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU@ 1 UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU 1 UUUUUUUUUUUUUUUUUUUUU 1 UUUUUUUUUUUUUUUUU 1 UUUUUUUUUUUUUUUU@ 1 OPAKOVAT " 1 O$="PRIKAZ": 1 O$="LOGICKA OPERACIA": 1 O$="FUNKCIA": 1 MAZE PREMENNE ;POPRIPADE CLEAR A POSUVA RAMTOP NA ADRESU A 1 LOAD EDITOR A 1 C$="napr.PRINT FN A() VOLA UZIVATELSKY DEFINOVANU FUNKCIU S NAZVOM A+VYHODNOTI JU A VYPISE VYSLEDOK NA OBAZOVKU" 1 C$="napr.FOR X=1 TO 10 STEP 2;DEFINUJE CYKLUS X RIADIACOU PREMENNOU X PRE X=1 AZ X=10 S KROKOM ZVYSOVANIA 2(AK NIE JE STEP UDANY JE 1;VID AJ PRIKAZ NEXT)" 1 C$="napr.DEF FN A()=4^5+10*7 DEFINUJE FUNKCIU S NAZVOM A ,A S TVAROM 4^5+10*7;V TVARE FUNKCIE MOZU BYT AJ PREMENNE napr.DEF FN A()=A^2+B PO ZAVOLANI FUNKCIE A(VID FN)BUDE VYHODNOTENY VYRAZ A^2+B" 1 C$="napr. DIM A(10,10...) DEFINUJE V PAMATI POCITACA CISELNE POLE(MATICU)S NAZVOM~A~A S ROZMERMI 10*10*... ;MOZE SA DEFINOVAT AJ RETAZCOVE POLE=> napr.DIM A$(3,5,7)" 1 C$="ZNAMIENKO VATSI ROVNY" 1 C$="ZNAMIENKO ROZNY" 1 C$="ZNAMIENKO MENSI ROVNY" 1 C$="ZASTAVI BEH PROGRAMU SO SPRAVOU 9 STOP statement" 1 C$="VYSLEDOK JE STLACENA KLAVESA" 1 C$="VYPISUJE NA OBRAZOVKU PROGRAM V POCITACI(MOZE BYT LIST A=>LISTUJE PROGRAM OD RIADKU A)" 1 C$="VYMAZE PROGRAM V BASICU(OD ZACIATKU BASICU PO ADRESU V SYSTEMOVEJ PREMENNEJ RAMTOP)" 1 C$="V EDITORE BOHUZIAL NEPRACUJU PRIKAZY: VERIFY~~, LOAD~~DATA,RUN,CLEAR ;PRIJEMNU ZABAVU A VELA USPECHOV TI PRAJE FIRMA KAMASOFT": 1 C$="URCUJE DATA PRE PRIKAZ READ" 1 C$="TVORI POZNAMKU PRE UZIVATELA VSETKO CO IDE ZA REM V DANOM RIADKU JE IGNOROVANE" 1 C$="TAN X-TANGENS X(X V RADIANOCH)" 1 C$="SYNTAX PODOBNE AKO LOAD ,ALE NENAHRAVA DO POCITACA ALE Z POCITACA NA MG.PASKU(SAVE~..~LINE A NAHRA NA MG.PASKU PROGRAM S TYM,ZE PO SPATNOM NAHRATI DO POCITACA SA AUTOMATICKY SPUSTI OD RIADKU A)" 1 C$="STR$ X-SPRAVI Z CISLA RETAZEC(PRIHODI UVODZOVKY)=RETAZEC ZNAKOV,KTORY BY BOL TLACENY PRI TLACENI X(JE TO OPAK FUNKCIE VAL)" 1 C$="SQR X-ODMOCNINA CISLA X" 1 C$="SPUSTA BEH PROGRAMU OD RIADKU 0 + MAZE VSETKY PREMENNE AJ OBRAZOVKU + VYKONA RESTORE RUN A PODOBNE AKO RUN ,ALE SPUSTI PROGRAM OD RIADKU A" 1 C$="SIN X-SINUS X(X V RADIANOCH)" 1 C$="SGN X-ZNAMIENKO(-1 PRE ZAPORNE CISLO,0 PRE 0,1 PRE KLADNE CISLO)" 1 C$="SCREEN$ (A,B) VYSLEDOK JE ZNAK NA RIADKU A,STLPCI B" 1 C$="ROBI KOPIU OBRAZOVKY NA TLACIAREN(ZX-PRINTER)" 1 C$="RETURN-NAVRAT Z PODPROGRAMU SKACE ZA POSLEDNY PRIKAZ GOSUB" 1 C$="READA,B NAPLNA PREMENNE A,B S DAT URCENYCH PRIKAZOM DATA A POSUVA POSICIU V ZOZNAME DAT NA DALSIE HODNOTY" 1 C$="RANDOMIZE USR X-VOLA STROJOVY PODPROGRAM NA ADRESE X PRINT USR ~X~-VYPISE ADRESU ZNAKU X V DEFINOVATELNEJ GRAFIKE(UMOZNUJE DEFINOVAT VLASTNE ZNAKY)" 1 C$="PRINT TAB A;~X~ POSUVA TLACOVU POZICIU NA STLPEC A + TLACI ZNAK X" 1 C$="PRINT PISE NA OBRAZOVKU ;PRINT~AHOJ~VYPISE AHOJ ;PRINT A VYPISE HODNOTU PREMENNEJ A ATD.(VID TAB,AT)" 1 C$="PRINT AT A,B;~X~ TLACI ZNAK X DO RIADKU A,STLPCA B" 1 C$="PRIKAZY CAT,FORMAT,MOVE,ERASE,OPEN #,CLOSE # PRACUJU LEN S MICRODRIVE" 1 C$="PRIKAZ MERGE~EXPERT~ NAHRAVA(PODOBNE AKO LOAD)DO POCITACA PROGRAM S NAZVOM EXPERT,ALE NERUSI RIADKY STAREHO PROGRAMU A PREMENNYCH S VYNIMKOU TYCH,KTORE MAJU ROVNAKE CISLA RIADKOV,ALEBO NAZVY PREMENNYCH" 1 C$="POUZIVA SA PRI SAVE,INPUT" 1 C$="POUZIVA SA PRI PRIKAZE IF" 1 C$="POUZIVA SA PRI PRIKAZE FOR,a napr.PRINT A$(1 TO 5)-VYPISE PRVYCH 5 ZNAKOV RETAZCA A$" 1 C$="POUZIVA SA PRI PRIKAZE FOR" 1 C$="POKE A,B NA ADRESU A ULOZI HODNOTU B" 1 C$="POINT (A,B) VYSLEDOK JE 1 AK JE NA OBRAZOVKE V POZICII (A,B) BOD,INAC JE VYSLEDOK 0" 1 C$="PODOBNY AKO PRINT,ALE PRACUJE S TLACIARNOU" 1 C$="PODOBNY AKO LIST,ALE PRACUJE S TLACIARNOU" 1 C$="PLOT A,B KRESLI BOD DO SURADNIC A,B(BOD 0,0 JE V LAVOM DOLNOM ROHU;ROZMERY OBRAZOVKY 255*175)" 1 C$="PEEK X-URCI HODNOTU V PAMATI NA ADRESE X" 1 C$="PAUSE A ZASTAVI PROGRAM NA A/50 SEC. AK JE STLACENE TLACITKO PROGRAM BEZI DALEJ;PAUSE 0 CAKA NA STLACENIE TLACITKA" 1 C$="OVER-SPUOSOB PREPISOVANIA ZOBRAZENYCH ZNAKOV;PRE OVER 0-UZ ZOBRAZENE ZNAKY BUDU NAHRADZOVANE NOVYMI ZNAKMI,1-NOVE ZNAKY BUDU SPLYVAT SO STARYMI ZNAKMI" 1 C$="OUT A,B VYSIELA HODNOTU B NA PORT A(OPERACIA NA UROVNI PROCESORU_OUT(A),B)" 1 C$="NOT X-VYSLEDOK JE 0 AK X 1 C$="NEXT X ZVYSUJE PREMENNU X O KROK ZADANY V PRIKAZE FOR A BEH PROGRAMU VRACIA ZA PRIKAZ FOR(VID PRIKAZ FOR)" 1 C$="NASTAVUJE POZICIU PRE ODBER DAT NA RIADOK NASLEDUJUCI ZA PRIKAZOM RESTORE" 1 C$="NASTAVUJE GENERATOR NAHODNYCH CISEL(NIE JE KLUCOVY PRIKAZ)VID RND" 1 C$="NASTAVI FARBU PODKLADU(PAPIERU) PODLA CISLA ZA PRIKAZOM(0-CIERNO,1-MODRO,2-CERVENO,3-FIALOVO,4-ZELENO,5-SLAB.MODRO,6-ZLTO,7-BIELO,8-PRIEHLADNE,9-KONTRASTNE)" 1 C$="NASTAVI FARBU PISMA(INKOUSTU) PODLA CISLA ZA PRIKAZOM(0-CIERNO,1-MODRO,2-CERVENO,3-FIALOVO,4-ZELENO,5-SLAB.MODRO,6-ZLTO,7-BIELO,8-PRIEHLADNE,9-KONTRASTNE)" 1 C$="NASTAVI FARBU OKRAJA OBRAZOVKY PODLA CISLA ZA PRIKAZOM(0-CIERNO,1-MODRO,2-CERVENO,3-FIALOVO,4-ZELENO,5-SLAB.MODRO,6-ZLTO,7-BIAEL)" 1 C$="NAPIS PRIKAZ,KTOREMU NEROZUMIES**************************************KAMASOFT**************************************************": 1 C$="MAZE PREMENNE ;POPRIPADE CLEAR A POSUVA RAMTOP NA ADRESU A" 1 C$="MAZE OBRAZOVKU" 1 C$="LUDOLFOVO CISLO 3.14159265..." 1 C$="LOGICKA OPERACIA ALEBO(napr.IF A=10 OR B=5 1 C$="LOGICKA OPERACIA A SUCASTNE(napr.IF A=10 AND B=5 1 C$="LOAD~NAZOV~ NAHRA DO POCITACA Z MG.PASKY PROGRAM S NAZVOM~NAZOV~ LOAD~..~DATA A() NAHRA CISELNE POLE LOAD~..~DATA A$()NAHRA ZNAKOOVE POLE LOAD~..~CODE NAHRA BYTES(MOZE BYT LOAD~..~CODE A=>NAHRA BYTES NA ADRESU A) LOAD~..~SCREEN$ NAHRA TV.OBRAZ" 1 C$="LN X-PRIRODZENY LOGARITMUS CISLA X" 1 C$="LET A=B DO PREMENNEJ A PRIRADI PREMENNU B(MOZU BYT AJ RETAZCOVE)" 1 C$="INVERSE-INVERZNE ZOBRAZOVANIE ZNAKOV;PRE INVERSE 0-NORMALNE ZOBRAZOVANIE ZNAKOV,1-ZNAKY BUDU ZOBRAZOVANE OPACNE;TJ. FARBOU PAPIERU NA FARBU INKOUSTU" 1 C$="INT X-CELA CAST CISLA (ZAOKRUHLENA DOLE)" 1 C$="INPUT A V LAVOM DOLNOM ROHU SA OBJAVI BLIKAJUCE L A POCITAC CAKA NA NAPLNENIE PREMENNEJ~A~ CISLOM MOZE BYT AJ INPUT A$,INPUT LINE A$..." 1 C$="IN X-TESTUJE PORT S ADRESOU X(OPERACIA NA UROVNI PROCESORU" 1 C$="IF A THEN B AK PLATI VYRAZ A POTOM JE VYKONAVANE B ;napr.IF A=10 1 C$="GOTO-SKOK;GOTO A BEH PROGRAMU BUDE POKRACOVAT OD RIADKU A" 1 C$="GOSUB A VOLA PODPROGRAM NA RIADKU A(VID RETURN)" 1 C$="GENERUJE NAHODNE CISLO" 1 C$="FLASH-BLIKANIE PISANYCH ZNAKOV;PRE FLASH 0-NEBLIKA,1-BLIKA,8-NEDA SA MENIT" 1 C$="EXP X-e^X;e=EULEROVO CISLO" 1 C$="DRAW A,B KRESLI PRIAMKU Z POSLEDNEJ POZICIE PLOT ,POSUVA X-SUR. O A , Y-SUR. O B ;POPRIPADE DRAW A,B,C KRESLI PRIAMKU S ZAKRIVENIM C STUPNOV" 1 C$="COS X-COSINUS X(X V RADIANOCH)" 1 C$="CONTINUE-POKRACUJ;POUZIVA SA PRI POUZITI BREAK=>POKRACUJE BEH PROGRAMU(SKACE NA POSLEDNY RIADOK,KTOREHO CHYBOVE HLASENIE BOLO 0)" 1 C$="CIRCLE A,B,C KRESLI KRUZNICU O STREDE [A,B] A POLOMEROM C BODOV(RASTER OBRAZOVKY 255*175;BOD[0,0] V LAVOM DOLNOM ROHU OBRAZOVKY)" 1 C$="CHR$ X-ZNAK,KTOREHO KOD JE X" 1 C$="BRIGHT-JAS PISANYCH ZNAKOV;PRE BRIGHT 0-NORMALNY,1-ZVYSENY,8-PRIEHLADNY" 1 C$="BIN X-(NIE JE BIN.OPERACIA) JE TO SPOSOB ZAPISU CISLA(ZAPIS V DVOJKOVEJ SUSTAVE) napr.BIN 00000111=7" 1 C$="BEEP A,B ZAZNIE TON Z REPRODUKTORA DLHY A SEK. A VO VYSKE B NAD STREDNYM C (ALEBO POD AK JE B ZAPORNE)" 1 C$="ATTR (A,B) VYSLEDOK JE ATRIBUTOVY(FARBOVY)KOD NA RIADKU A,STLPCI B;PODLA PRAVIDLA 128*BLIKANIE+64*JAS+8*FARBA PAPIERU+FARBA INKOUSTU" 1 C$="ATN X-ARCUSTANGENS V RADIANOCH CISLA X" 1 C$="ASN X-ARCUSSINUS V RADIANOCH CISLA X" 1 C$="ARGUMENT JE ZNAK,KTOREMU JE PRIRADENY KOD" 1 C$="ARGUMENT JE RETAZEC,URCI DLZKU RETAZCA" 1 C$="ARGUMENT JE RETAZEC,KTORY VYHODNOTI BEZ UVODZOVIEK(ODHODI KRAJNE UVODZOVKY) A CAKA ZNOVA RETAZEC;napr.PRINT VAL$ ~~~A~~~ VYPISE A" 1 C$="ARGUMENT JE RETAZEC,KTORY VYHODNOTI BEZ UVODZOVIEK(ODHODI KRAJNE UVODZOVKY) A CAKA CISLO;napr.PRINT VAL ~1~ VYPISE 1" 1 C$="AKO LOAD,ALE DATA SA NEUKLADAJU DO PAMATE IBA SA S NOU POROVNAVAJU;AK JE ZISTENA ODLISNOST OBJAVI SA CHYBA R;(POUZIVA SA PO SAVE NA KONTROLU SPRAVNOSTI NAHRATIA NA MG.PASKU)" 1 C$="ACS X-ARCUSCOSINUS V RADIANOCH CISLA X" 1 C$="ABS X-ABSOLUTNA HODNOTA CISLA X" 1 BASIC TUTOR BY L.KARRACH 1987 1 BASIC S 1 BASIC M/C1 1 BASIC M/C 1 BASIC 1 1 @a a5p%uPee`%E eU`ttptt@%EpUuPr"p 1 ;"LOADING ERROR": 1 ;"BASIC TUTOR BY 1 ;"AUTOR:L.KARRACH": 1 ;"********************************": 1 ;"********************************" 1 ;" BASIC EDITOR IS LOADING ": 1 ;" ";A$;" ";O$;" ": 1 ;" ": 1 88888888888888888888888888888888888888888888888888888888888888888888$$$$$$$$$$8888888888888888888888$$$$$$$$$$8888888888888888888888$$$$$$$$$$8888888888888888888888$888888$$$8888888888888888888888$888888$$$8888888888888888888888$$$$$$$$$$8888888888888888888888 88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888998888888888888888888888888888889988888888888888888888888888888899888888888888888888888888888888999888888888888888888888888888889998888::888:88888888888888888889999999:::::::8888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888] 1 5UUUUUUUUUUUUUUUUUU 1 5UUUUUUUUUUUUUUUP 1 5UUUUUUUUUUUUUUU 1 35=AK A JE ROVNE 10 POTOM SKOK NA RIADOK 35" 1 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1 0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1 000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000 1 000000000000000000000 1 0 , 1 AK X=0" 1 ...=AK A=10 ALEBO B=5 POTOM ...)" 1 ...=AK A=10 A SUCASTNE B=5 POTOM ...)" 1 *****PRIKAZY*************** 1 *****FUNKCIE*********** 1 UfPDDpWUPeUPuUped@%U0efP4!`r" UU`UU UWPU%PU" q$pdD`D! 1 5UUUUUUUUUUUUUUU